(custom-set-variables ;; custom-set-variables was added by Custom -- don't edit or cut/paste it! ;; Your init file should contain only one such instance. '(adaptive-fill-function (quote ignore)) '(auto-compression-mode t nil (jka-compr)) '(backup-by-copying t) '(buffer-offer-save t) '(c-echo-syntactic-information-p t) '(c-report-syntactic-errors t) '(c-require-final-newline (quote ((c-mode . t) (c++-mode . t) (objc-mode . t) (java-mode) (idl-mode) (pike-mode)))) '(c-strict-syntax-p t) '(case-fold-search t) '(colon-double-space nil nil nil "?") '(column-number-mode t) '(comment-style (quote indent) t) '(confirm-kill-emacs (quote yes-or-no-p)) '(current-language-environment "English") '(default-input-method "rfc1345") '(default-justification (quote left)) '(delete-selection-mode nil nil (delsel)) '(desktop-enable t nil (desktop)) '(display-time-24hr-format t) '(display-time-day-and-date t) '(display-time-format "%a %b %u %Y. %H:%M:%S") '(display-time-interval 1) '(display-time-mail-face (quote 9x15)) '(display-time-mode t nil (time)) '(file-precious-flag t) '(fill-column 80) '(frame-background-mode (quote dark)) '(global-auto-revert-mode t nil (autorevert)) '(global-font-lock-mode t nil (font-lock)) '(global-hl-line-mode t nil (hl-line)) '(hl-line-face (quote highlight)) '(html-mode-hook (quote (html-autoview-mode))) '(left-margin 16) '(line-number-mode t nil nil "Line Numbers Are Go!") '(make-backup-files t) '(mouse-wheel-mode t nil (mwheel)) '(require-final-newline t) '(save-place t nil (saveplace)) '(scroll-bar-mode nil) '(show-paren-mode t nil (paren)) '(text-mode-hook (quote (turn-on-auto-fill text-mode-hook-identify))) '(tool-bar-mode nil nil (tool-bar)) '(transient-mark-mode t) '(uniquify-buffer-name-style (quote forward) nil (uniquify)) '(viper-auto-indent t) '(viper-mode t) '(viper-want-emacs-keys-in-vi nil)) (custom-set-faces ;; custom-set-faces was added by Custom -- don't edit or cut/paste it! ;; Your init file should contain only one such instance. '(default ((t (:stipple nil :background "Black" :foreground "White" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 129 :width normal :family "misc-fixed")))) '(border ((t (:background "Black" :height 1 :width condensed)))) '(fringe ((((class color) (background dark)) (:background "Black")))) '(highlight ((((class color) (background dark)) (:inherit nil :stipple nil :background "grey30" :foreground "Wheat" :weight normal :family "fixed")))) '(mode-line ((((type x w32 mac) (class color)) (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button) :family "misc-fixed")))) '(scroll-bar ((t (:background "grey16")))) '(tool-bar ((((type x w32 mac) (class color)) (:background "DarkSlateGrey" :foreground "Wheat" :box (:line-width 1 :style released-button) :family "misc-fixed"))))) (defun linux-c-mode () "C mode with adjusted defaults for use with the Linux kernel." (interactive) (c-mode) (c-set-style "K&R") (setq tab-width 8) (setq indent-tabs-mode t) (setq c-basic-offset 8)) (setq inhibit-startup-message t) (setq auto-mode-alist (cons '("/home/hsimpson/sysinfo.*/.*\\.[ch]$" . linux-c-mode) auto-mode-alist)) ;; From Fedora Core 5. (setq frame-title-format (concat "%b -emacs@" (system-name)))